home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d8 / tm211_1.arc / SCR.ARC / PCBOARD.SCR < prev    next >
Text File  |  1990-06-06  |  2KB  |  67 lines
  1.  
  2. ; PCBOARD.SCR is a log on script file for PCBoard
  3. ;
  4.  
  5. Name = "first last"          ; put your name here
  6. Color = "Y^M"                ; "Y"es or "N"o
  7.  
  8. AdvanceFeature = 1           ; enable advance features, 0 to disable
  9.  
  10. When "graphics",Color
  11.  
  12. Waitfor 0                    ; unlimited waiting time
  13.  
  14. Waitfor "first name?"
  15. Put Name
  16.  
  17. Waitfor "Password"
  18. Put "^&"
  19.  
  20. when "graphics",""           ; cancel the response string
  21.  
  22. ;
  23. ; advance features include
  24. ;  MegaReader    auto session (upload reply and download message)
  25. ;  Ymodem        auto download
  26. ;  Ymodem-G      auto download
  27. ;  Batch Ymodem  auto download
  28. ;  Xmodem        auto download
  29. ;  Xmodem-1K     auto download
  30. ;
  31.  
  32. if AdvanceFeature
  33.   while connected
  34.     waitfor "Download Size:","From Your Reader Now...",10
  35.     switch found
  36.       case 1:                            ; Auto-downlaod
  37.         waitfor "Protocol Type:",3
  38.         if found
  39.           waitfor "Xmodem","Ymodem",1
  40.           switch found
  41.             case 1:
  42.               waitfor "Transfer",2       ; Xmodem or Xmodem-1k
  43.               receive "x",""             ; use guessing name
  44.             case 2:
  45.               waitfor "G","^M",1
  46.               switch found
  47.                 case 1:
  48.                   protocol = "g"         ; Ymodem-G
  49.                 case 2:
  50.                   protocol = "b"         ; Batch Ymodem
  51.               endswitch
  52.               waitfor "Transfer","(Enter)=continue?",2
  53.               if found=2
  54.                 put
  55.                 waitfor "Start your download",1
  56.               endif
  57.               receive protocol
  58.           endswitch
  59.         endif
  60.       case 2:
  61.         delay 10
  62.         send "z",""                      ; MegaReader
  63.     endswitch
  64.   endwhile
  65. endif
  66.  
  67.